home *** CD-ROM | disk | FTP | other *** search
/ Internet Info 1994 March / Internet Info CD-ROM (Walnut Creek) (March 1994).iso / networking / mail / mh / contrib / 9302 / mhpped.shar < prev    next >
SHell self-extracting ARchive  |  1993-02-03  |  10.2 KB
open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: SHell self-extracting ARchive (archive/shar).

ConfidenceProgramDetectionMatch TypeSupport
66% dexvert SHell self-extracting ARchive (archive/shar) ext Supported
1% dexvert Text File (text/txt) fallback Supported
100% file magic text fragment for file(1) cmd, 1st line "#--------------------------------CUT HERE-------------------------------------", 2nd line "#! /bin/sh", ASCII text default (weak)
100% checkBytes Printable ASCII default
100% perlTextCheck Likely Text (Perl) default
100% detectItEasy Format: plain text[LF] default (weak)


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 23 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |#-------|--------|
|00000010| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000020| 2d 43 55 54 20 48 45 52 | 45 2d 2d 2d 2d 2d 2d 2d |-CUT HER|E-------|
|00000030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000040| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0a 23 |--------|------.#|
|00000050| 21 20 2f 62 69 6e 2f 73 | 68 0a 23 0a 23 20 54 68 |! /bin/s|h.#.# Th|
|00000060| 69 73 20 69 73 20 61 20 | 73 68 65 6c 6c 20 61 72 |is is a |shell ar|
|00000070| 63 68 69 76 65 2e 20 20 | 53 61 76 65 20 74 68 69 |chive.  |Save thi|
|00000080| 73 20 69 6e 74 6f 20 61 | 20 66 69 6c 65 2c 20 65 |s into a| file, e|
|00000090| 64 69 74 20 69 74 0a 23 | 20 61 6e 64 20 64 65 6c |dit it.#| and del|
|000000a0| 65 74 65 20 61 6c 6c 20 | 6c 69 6e 65 73 20 61 62 |ete all |lines ab|
|000000b0| 6f 76 65 20 74 68 69 73 | 20 63 6f 6d 6d 65 6e 74 |ove this| comment|
|000000c0| 2e 20 20 54 68 65 6e 20 | 67 69 76 65 20 74 68 69 |.  Then |give thi|
|000000d0| 73 0a 23 20 66 69 6c 65 | 20 74 6f 20 73 68 20 62 |s.# file| to sh b|
|000000e0| 79 20 65 78 65 63 75 74 | 69 6e 67 20 74 68 65 20 |y execut|ing the |
|000000f0| 63 6f 6d 6d 61 6e 64 20 | 22 73 68 20 66 69 6c 65 |command |"sh file|
|00000100| 22 2e 20 20 54 68 65 20 | 66 69 6c 65 73 0a 23 20 |".  The |files.# |
|00000110| 77 69 6c 6c 20 62 65 20 | 65 78 74 72 61 63 74 65 |will be |extracte|
|00000120| 64 20 69 6e 74 6f 20 74 | 68 65 20 63 75 72 72 65 |d into t|he curre|
|00000130| 6e 74 20 64 69 72 65 63 | 74 6f 72 79 20 6f 77 6e |nt direc|tory own|
|00000140| 65 64 20 62 79 0a 23 20 | 79 6f 75 20 77 69 74 68 |ed by.# |you with|
|00000150| 20 64 65 66 61 75 6c 74 | 20 70 65 72 6d 69 73 73 | default| permiss|
|00000160| 69 6f 6e 73 2e 0a 23 0a | 23 20 54 68 65 20 66 69 |ions..#.|# The fi|
|00000170| 6c 65 73 20 63 6f 6e 74 | 61 69 6e 65 64 20 68 65 |les cont|ained he|
|00000180| 72 65 69 6e 20 61 72 65 | 3a 0a 23 0a 23 20 2d 72 |rein are|:.#.# -r|
|00000190| 2d 78 72 2d 78 72 2d 78 | 20 31 20 6a 73 77 65 65 |-xr-xr-x| 1 jswee|
|000001a0| 74 20 34 39 31 39 20 4e | 6f 76 20 31 32 20 30 32 |t 4919 N|ov 12 02|
|000001b0| 3a 30 34 20 6d 68 70 70 | 65 64 0a 23 20 2d 72 2d |:04 mhpp|ed.# -r-|
|000001c0| 2d 72 2d 2d 72 2d 2d 20 | 31 20 6a 73 77 65 65 74 |-r--r-- |1 jsweet|
|000001d0| 20 33 39 37 36 20 4e 6f | 76 20 31 31 20 31 37 3a | 3976 No|v 11 17:|
|000001e0| 35 33 20 6d 68 70 70 65 | 64 2e 6c 0a 23 0a 65 63 |53 mhppe|d.l.#.ec|
|000001f0| 68 6f 20 27 78 20 2d 20 | 6d 68 70 70 65 64 27 0a |ho 'x - |mhpped'.|
|00000200| 69 66 20 74 65 73 74 20 | 2d 66 20 6d 68 70 70 65 |if test |-f mhppe|
|00000210| 64 3b 20 74 68 65 6e 20 | 65 63 68 6f 20 27 73 68 |d; then |echo 'sh|
|00000220| 61 72 3a 20 6e 6f 74 20 | 6f 76 65 72 77 72 69 74 |ar: not |overwrit|
|00000230| 69 6e 67 20 6d 68 70 70 | 65 64 27 3b 20 65 6c 73 |ing mhpp|ed'; els|
|00000240| 65 0a 73 65 64 20 27 73 | 2f 5e 58 2f 2f 27 20 3c |e.sed 's|/^X//' <|
|00000250| 3c 20 27 5f 5f 5f 5f 5f | 5f 5f 5f 54 68 69 73 5f |< '_____|___This_|
|00000260| 49 73 5f 54 68 65 5f 45 | 4e 44 5f 5f 5f 5f 5f 5f |Is_The_E|ND______|
|00000270| 5f 5f 27 20 3e 20 6d 68 | 70 70 65 64 0a 58 23 21 |__' > mh|pped.X#!|
|00000280| 2f 75 73 72 2f 62 69 6e | 2f 70 65 72 6c 0a 58 23 |/usr/bin|/perl.X#|
|00000290| 0a 58 23 20 6d 68 70 70 | 65 64 20 2d 20 70 72 6f |.X# mhpp|ed - pro|
|000002a0| 63 65 73 73 20 62 61 63 | 6b 74 69 63 6b 73 20 69 |cess bac|kticks i|
|000002b0| 6e 20 63 6f 6d 70 2c 20 | 72 65 70 6c 2c 20 61 6e |n comp, |repl, an|
|000002c0| 64 20 66 6f 72 77 20 63 | 6f 6d 70 6f 6e 65 6e 74 |d forw c|omponent|
|000002d0| 73 0a 58 23 0a 58 23 20 | 54 61 6b 65 6e 20 66 72 |s.X#.X# |Taken fr|
|000002e0| 6f 6d 20 22 74 65 73 74 | 65 64 69 74 22 20 62 79 |om "test|edit" by|
|000002f0| 20 4a 65 72 72 79 20 50 | 65 65 6b 20 3c 6a 65 72 | Jerry P|eek <jer|
|00000300| 72 79 40 6f 72 61 2e 63 | 6f 6d 3e 3b 0a 58 23 20 |ry@ora.c|om>;.X# |
|00000310| 61 62 75 73 65 72 3a 20 | 4a 65 72 72 79 20 53 77 |abuser: |Jerry Sw|
|00000320| 65 65 74 20 3c 6a 73 77 | 65 65 74 40 69 72 76 69 |eet <jsw|eet@irvi|
|00000330| 6e 65 2e 63 6f 6d 3e 0a | 58 23 0a 58 23 20 24 48 |ne.com>.|X#.X# $H|
|00000340| 65 61 64 65 72 3a 20 2f | 75 73 72 2f 74 2f 75 73 |eader: /|usr/t/us|
|00000350| 65 72 73 2f 6a 73 77 65 | 65 74 2f 73 72 63 2f 6d |ers/jswe|et/src/m|
|00000360| 68 2d 66 72 6f 6e 74 2f | 52 43 53 2f 6d 68 70 70 |h-front/|RCS/mhpp|
|00000370| 65 64 2c 76 20 31 2e 35 | 20 31 39 39 32 2f 31 31 |ed,v 1.5| 1992/11|
|00000380| 2f 31 32 20 31 30 3a 30 | 33 3a 34 37 20 6a 73 77 |/12 10:0|3:47 jsw|
|00000390| 65 65 74 20 45 78 70 20 | 24 0a 58 0a 58 23 0a 58 |eet Exp |$.X.X#.X|
|000003a0| 23 20 53 75 62 70 72 6f | 67 72 61 6d 73 0a 58 23 |# Subpro|grams.X#|
|000003b0| 0a 58 0a 58 73 75 62 20 | 62 61 69 6c 20 7b 0a 58 |.X.Xsub |bail {.X|
|000003c0| 20 20 75 6e 6c 69 6e 6b | 20 24 74 65 6d 70 3b 0a |  unlink| $temp;.|
|000003d0| 58 20 20 65 78 69 74 20 | 31 3b 0a 58 7d 0a 58 0a |X  exit |1;.X}.X.|
|000003e0| 58 73 75 62 20 67 72 69 | 70 65 20 7b 0a 58 20 20 |Xsub gri|pe {.X  |
|000003f0| 70 72 69 6e 74 20 53 54 | 44 45 52 52 20 22 24 70 |print ST|DERR "$p|
|00000400| 72 6f 67 3a 20 22 2c 20 | 40 5f 2c 20 22 5c 6e 22 |rog: ", |@_, "\n"|
|00000410| 3b 0a 58 7d 0a 58 0a 58 | 73 75 62 20 62 61 72 66 |;.X}.X.X|sub barf|
|00000420| 20 7b 0a 58 20 20 26 67 | 72 69 70 65 28 40 5f 29 | {.X  &g|ripe(@_)|
|00000430| 3b 0a 58 20 20 26 62 61 | 69 6c 3b 0a 58 7d 0a 58 |;.X  &ba|il;.X}.X|
|00000440| 0a 58 73 75 62 20 63 68 | 65 63 6b 20 7b 0a 58 20 |.Xsub ch|eck {.X |
|00000450| 20 6c 6f 63 61 6c 28 24 | 73 74 61 74 75 73 29 20 | local($|status) |
|00000460| 3d 20 40 5f 3b 0a 58 20 | 20 26 62 61 72 66 28 22 |= @_;.X | &barf("|
|00000470| 70 72 6f 62 6c 65 6d 20 | 77 72 69 74 69 6e 67 20 |problem |writing |
|00000480| 74 6f 20 74 65 6d 70 6f | 72 61 72 79 20 64 72 61 |to tempo|rary dra|
|00000490| 66 74 20 66 69 6c 65 20 | 5c 22 24 74 65 6d 70 5c |ft file |\"$temp\|
|000004a0| 22 2d 20 24 21 22 29 0a | 58 09 75 6e 6c 65 73 73 |"- $!").|X.unless|
|000004b0| 20 24 73 74 61 74 75 73 | 3b 0a 58 7d 0a 58 0a 58 | $status|;.X}.X.X|
|000004c0| 73 75 62 20 73 68 20 7b | 0a 58 20 20 6c 6f 63 61 |sub sh {|.X  loca|
|000004d0| 6c 28 24 5f 29 20 3d 20 | 40 5f 3b 0a 58 20 20 6c |l($_) = |@_;.X  l|
|000004e0| 6f 63 61 6c 28 24 73 74 | 29 3b 0a 58 0a 58 20 20 |ocal($st|);.X.X  |
|000004f0| 69 66 20 28 24 76 65 72 | 62 6f 73 65 29 20 7b 0a |if ($ver|bose) {.|
|00000500| 58 20 20 20 20 70 72 69 | 6e 74 20 22 5c 74 24 5f |X    pri|nt "\t$_|
|00000510| 5c 6e 22 3b 0a 58 20 20 | 7d 0a 58 0a 58 20 20 72 |\n";.X  |}.X.X  r|
|00000520| 65 74 75 72 6e 20 69 66 | 20 24 64 65 62 75 67 3b |eturn if| $debug;|
|00000530| 0a 58 0a 58 20 20 24 73 | 74 20 3d 20 73 79 73 74 |.X.X  $s|t = syst|
|00000540| 65 6d 20 22 24 5f 22 3b | 0a 58 0a 58 20 20 69 66 |em "$_";|.X.X  if|
|00000550| 20 28 24 73 74 20 3e 3e | 20 38 29 20 7b 0a 58 20 | ($st >>| 8) {.X |
|00000560| 20 20 20 73 70 6c 69 74 | 3b 0a 58 20 20 20 20 26 |   split|;.X    &|
|00000570| 62 61 72 66 28 22 24 5f | 5b 30 5d 20 66 61 69 6c |barf("$_|[0] fail|
|00000580| 65 64 20 77 69 74 68 20 | 73 74 61 74 75 73 20 22 |ed with |status "|
|00000590| 2c 20 24 73 74 20 3e 3e | 20 38 29 3b 0a 58 20 20 |, $st >>| 8);.X  |
|000005a0| 20 20 65 78 69 74 20 31 | 3b 0a 58 20 20 7d 0a 58 |  exit 1|;.X  }.X|
|000005b0| 7d 0a 58 0a 58 73 75 62 | 20 72 65 61 64 5f 70 72 |}.X.Xsub| read_pr|
|000005c0| 6f 66 69 6c 65 20 7b 0a | 58 20 20 23 20 44 65 66 |ofile {.|X  # Def|
|000005d0| 69 6e 65 73 20 61 73 73 | 6f 63 69 61 74 69 76 65 |ines ass|ociative|
|000005e0| 20 61 72 72 61 79 20 25 | 50 52 4f 46 49 4c 45 5f | array %|PROFILE_|
|000005f0| 43 4f 4d 50 4f 4e 45 4e | 54 20 69 6e 64 65 78 65 |COMPONEN|T indexe|
|00000600| 64 20 62 79 20 6c 6f 77 | 65 72 20 63 61 73 65 0a |d by low|er case.|
|00000610| 58 20 20 23 20 63 6f 6d | 70 6f 6e 65 6e 74 20 6e |X  # com|ponent n|
|00000620| 61 6d 65 2e 20 20 43 6f | 6e 74 69 6e 75 61 74 69 |ame.  Co|ntinuati|
|00000630| 6f 6e 20 6c 69 6e 65 73 | 20 61 72 65 20 74 61 63 |on lines| are tac|
|00000640| 6b 65 64 20 6f 6e 2e 20 | 20 4e 65 77 0a 58 20 20 |ked on. | New.X  |
|00000650| 23 20 6f 63 63 75 72 72 | 65 6e 63 65 73 20 6f 66 |# occurr|ences of|
|00000660| 20 61 20 63 6f 6d 70 6f | 6e 65 6e 74 20 77 69 70 | a compo|nent wip|
|00000670| 65 20 6f 75 74 20 70 72 | 65 76 69 6f 75 73 20 6f |e out pr|evious o|
|00000680| 63 63 75 72 72 65 6e 63 | 65 73 20 6f 66 20 74 68 |ccurrenc|es of th|
|00000690| 65 0a 58 20 20 23 20 73 | 61 6d 65 20 63 6f 6d 70 |e.X  # s|ame comp|
|000006a0| 6f 6e 65 6e 74 2c 20 62 | 75 74 20 70 72 6f 62 61 |onent, b|ut proba|
|000006b0| 62 6c 79 20 73 68 6f 75 | 6c 64 6e 27 74 2e 0a 58 |bly shou|ldn't..X|
|000006c0| 0a 58 20 20 6c 6f 63 61 | 6c 28 24 70 72 6f 66 69 |.X  loca|l($profi|
|000006d0| 6c 65 29 20 3d 20 64 65 | 66 69 6e 65 64 20 24 45 |le) = de|fined $E|
|000006e0| 4e 56 7b 27 4d 48 27 7d | 20 3f 20 24 45 4e 56 7b |NV{'MH'}| ? $ENV{|
|000006f0| 27 4d 48 27 7d 20 3a 20 | 0a 58 09 09 09 09 09 20 |'MH'} : |.X..... |
|00000700| 24 45 4e 56 7b 27 48 4f | 4d 45 27 7d 20 2e 20 22 |$ENV{'HO|ME'} . "|
|00000710| 2f 2e 6d 68 5f 70 72 6f | 66 69 6c 65 22 3b 0a 58 |/.mh_pro|file";.X|
|00000720| 20 20 6c 6f 63 61 6c 28 | 24 70 72 6f 66 69 6c 65 |  local(|$profile|
|00000730| 5f 63 6f 6d 70 6f 6e 65 | 6e 74 29 20 3d 20 27 78 |_compone|nt) = 'x|
|00000740| 2d 62 6f 67 75 73 27 3b | 0a 58 20 20 6c 6f 63 61 |-bogus';|.X  loca|
|00000750| 6c 28 24 5f 29 3b 0a 58 | 20 20 0a 58 20 20 26 62 |l($_);.X|  .X  &b|
|00000760| 61 72 66 28 22 63 61 6e | 27 74 20 6f 70 65 6e 20 |arf("can|'t open |
|00000770| 70 72 6f 66 69 6c 65 20 | 5c 22 24 70 72 6f 66 69 |profile |\"$profi|
|00000780| 6c 65 5c 22 20 2d 20 24 | 21 22 29 0a 58 09 75 6e |le\" - $|!").X.un|
|00000790| 6c 65 73 73 20 6f 70 65 | 6e 28 50 52 4f 46 49 4c |less ope|n(PROFIL|
|000007a0| 45 2c 20 22 3c 24 70 72 | 6f 66 69 6c 65 22 29 3b |E, "<$pr|ofile");|
|000007b0| 0a 58 0a 58 20 20 77 68 | 69 6c 65 20 28 3c 50 52 |.X.X  wh|ile (<PR|
|000007c0| 4f 46 49 4c 45 3e 29 20 | 7b 0a 58 20 20 20 20 2f |OFILE>) |{.X    /|
|000007d0| 5e 28 5c 53 2b 29 3a 5c | 73 2a 2f 20 26 26 20 64 |^(\S+):\|s*/ && d|
|000007e0| 6f 20 7b 0a 58 20 20 20 | 20 20 20 09 20 20 28 24 |o {.X   |   .  ($|
|000007f0| 70 72 6f 66 69 6c 65 5f | 63 6f 6d 70 6f 6e 65 6e |profile_|componen|
|00000800| 74 20 3d 20 24 31 29 20 | 3d 7e 20 74 72 2f 41 2d |t = $1) |=~ tr/A-|
|00000810| 5a 2f 61 2d 7a 2f 3b 0a | 58 20 20 20 20 20 20 09 |Z/a-z/;.|X      .|
|00000820| 20 20 24 50 52 4f 46 49 | 4c 45 5f 43 4f 4d 50 4f |  $PROFI|LE_COMPO|
|00000830| 4e 45 4e 54 7b 24 70 72 | 6f 66 69 6c 65 5f 63 6f |NENT{$pr|ofile_co|
|00000840| 6d 70 6f 6e 65 6e 74 7d | 20 3d 20 24 27 3b 0a 58 |mponent}| = $';.X|
|00000850| 20 20 20 20 20 20 20 20 | 7d 3b 0a 58 20 20 0a 58 |        |};.X  .X|
|00000860| 20 20 20 20 2f 5e 5b 20 | 5c 74 5d 2f 20 26 26 20 |    /^[ |\t]/ && |
|00000870| 64 6f 20 7b 0a 58 20 20 | 20 20 20 20 09 20 20 24 |do {.X  |    .  $|
|00000880| 50 52 4f 46 49 4c 45 5f | 43 4f 4d 50 4f 4e 45 4e |PROFILE_|COMPONEN|
|00000890| 54 7b 24 70 72 6f 66 69 | 6c 65 5f 63 6f 6d 70 6f |T{$profi|le_compo|
|000008a0| 6e 65 6e 74 7d 20 2e 3d | 20 24 5f 3b 0a 58 20 20 |nent} .=| $_;.X  |
|000008b0| 20 20 20 20 20 20 7d 3b | 0a 58 20 20 7d 0a 58 7d |      };|.X  }.X}|
|000008c0| 0a 58 0a 58 23 0a 58 23 | 20 4d 61 69 6e 0a 58 23 |.X.X#.X#| Main.X#|
|000008d0| 0a 58 0a 58 75 6d 61 73 | 6b 20 30 37 37 3b 20 20 |.X.Xumas|k 077;  |
|000008e0| 23 20 54 68 69 73 20 73 | 68 6f 75 6c 64 20 70 72 |# This s|hould pr|
|000008f0| 6f 62 61 62 6c 79 20 62 | 65 20 61 64 6a 75 73 74 |obably b|e adjust|
|00000900| 61 62 6c 65 2c 20 62 75 | 74 20 69 73 6e 27 74 20 |able, bu|t isn't |
|00000910| 61 74 20 74 68 65 20 6d | 6f 6d 65 6e 74 2e 0a 58 |at the m|oment..X|
|00000920| 0a 58 28 24 70 72 6f 67 | 20 3d 20 24 30 29 20 3d |.X($prog| = $0) =|
|00000930| 7e 20 73 7c 2e 2a 2f 7c | 7c 3b 09 23 20 47 65 74 |~ s|.*/|||;.# Get|
|00000940| 20 74 68 65 20 69 6e 76 | 6f 63 61 74 69 6f 6e 20 | the inv|ocation |
|00000950| 6e 61 6d 65 20 6f 66 20 | 74 68 69 73 20 70 72 6f |name of |this pro|
|00000960| 67 72 61 6d 0a 58 0a 58 | 23 20 43 68 65 63 6b 20 |gram.X.X|# Check |
|00000970| 74 68 65 20 70 72 6f 66 | 69 6c 65 0a 58 0a 58 26 |the prof|ile.X.X&|
|00000980| 72 65 61 64 5f 70 72 6f | 66 69 6c 65 3b 0a 58 69 |read_pro|file;.Xi|
|00000990| 66 20 28 64 65 66 69 6e | 65 64 20 24 50 52 4f 46 |f (defin|ed $PROF|
|000009a0| 49 4c 45 5f 43 4f 4d 50 | 4f 4e 45 4e 54 7b 24 70 |ILE_COMP|ONENT{$p|
|000009b0| 72 6f 67 7d 29 20 7b 0a | 58 20 20 70 75 73 68 28 |rog}) {.|X  push(|
|000009c0| 40 41 72 67 73 2c 20 73 | 70 6c 69 74 28 27 20 27 |@Args, s|plit(' '|
|000009d0| 2c 20 24 50 52 4f 46 49 | 4c 45 5f 43 4f 4d 50 4f |, $PROFI|LE_COMPO|
|000009e0| 4e 45 4e 54 7b 24 70 72 | 6f 67 7d 29 29 3b 0a 58 |NENT{$pr|og}));.X|
|000009f0| 7d 0a 58 0a 58 23 20 43 | 68 65 63 6b 20 74 68 65 |}.X.X# C|heck the|
|00000a00| 20 63 6f 6d 6d 61 6e 64 | 20 6c 69 6e 65 20 61 72 | command| line ar|
|00000a10| 67 75 6d 65 6e 74 73 0a | 58 0a 58 70 75 73 68 28 |guments.|X.Xpush(|
|00000a20| 40 41 72 67 73 2c 20 40 | 41 52 47 56 29 3b 0a 58 |@Args, @|ARGV);.X|
|00000a30| 0a 58 77 68 69 6c 65 20 | 28 24 5f 20 3d 20 73 68 |.Xwhile |($_ = sh|
|00000a40| 69 66 74 20 40 41 72 67 | 73 29 20 7b 0a 58 20 20 |ift @Arg|s) {.X  |
|00000a50| 2f 5e 2d 64 65 62 75 67 | 24 2f 20 26 26 20 64 6f |/^-debug|$/ && do|
|00000a60| 20 7b 20 2b 2b 24 64 65 | 62 75 67 3b 20 6e 65 78 | { ++$de|bug; nex|
|00000a70| 74 3b 20 7d 3b 0a 58 0a | 58 20 20 2f 5e 2d 65 64 |t; };.X.|X  /^-ed|
|00000a80| 69 74 6f 72 24 7c 5e 2d | 65 64 69 74 24 2f 20 26 |itor$|^-|edit$/ &|
|00000a90| 26 20 64 6f 20 7b 20 24 | 65 64 69 74 6f 72 20 3d |& do { $|editor =|
|00000aa0| 20 73 68 69 66 74 20 40 | 41 72 67 73 3b 20 6e 65 | shift @|Args; ne|
|00000ab0| 78 74 3b 20 7d 3b 0a 58 | 0a 58 20 20 2f 5e 2d 65 |xt; };.X|.X  /^-e|
|00000ac0| 6e 74 69 72 65 24 2f 20 | 26 26 20 64 6f 20 7b 20 |ntire$/ |&& do { |
|00000ad0| 2b 2b 24 65 6e 74 69 72 | 65 3b 20 6e 65 78 74 3b |++$entir|e; next;|
|00000ae0| 20 7d 3b 0a 58 0a 58 20 | 20 2f 5e 2d 68 65 6c 70 | };.X.X | /^-help|
|00000af0| 24 2f 20 26 26 20 64 6f | 20 7b 0a 58 20 20 20 20 |$/ && do| {.X    |
|00000b00| 20 20 70 72 69 6e 74 20 | 3c 3c 22 78 78 45 6e 64 |  print |<<"xxEnd|
|00000b10| 48 65 6c 70 78 78 22 3b | 0a 58 24 70 72 6f 67 20 |Helpxx";|.X$prog |
|00000b20| 2d 20 70 72 65 2d 70 72 | 6f 63 65 73 73 20 61 6e |- pre-pr|ocess an|
|00000b30| 20 4d 48 20 63 6f 6d 70 | 6f 73 69 74 69 6f 6e 20 | MH comp|osition |
|00000b40| 74 65 6d 70 6c 61 74 65 | 0a 58 55 73 61 67 65 3a |template|.XUsage:|
|00000b50| 20 24 70 72 6f 67 20 5b | 2d 28 6e 6f 29 64 65 62 | $prog [|-(no)deb|
|00000b60| 75 67 5d 20 5b 2d 65 64 | 69 74 6f 72 20 65 64 69 |ug] [-ed|itor edi|
|00000b70| 74 6f 72 5d 20 5b 2d 6e | 6f 65 64 69 74 6f 72 5d |tor] [-n|oeditor]|
|00000b80| 20 5b 2d 28 6e 6f 29 65 | 6e 74 69 72 65 5d 20 5b | [-(no)e|ntire] [|
|00000b90| 2d 68 65 6c 70 5d 0a 58 | 20 20 20 20 20 20 20 20 |-help].X|        |
|00000ba0| 20 20 20 20 20 20 20 20 | 5b 2d 28 6e 6f 29 76 65 |        |[-(no)ve|
|00000bb0| 72 62 6f 73 65 5d 20 5b | 66 69 6c 65 5d 0a 58 4f |rbose] [|file].XO|
|00000bc0| 70 74 69 6f 6e 73 3a 0a | 58 20 20 2d 64 65 62 75 |ptions:.|X  -debu|
|00000bd0| 67 20 20 20 20 20 20 20 | 20 20 20 70 72 69 6e 74 |g       |   print|
|00000be0| 20 74 68 65 20 6d 65 73 | 73 61 67 65 20 64 72 61 | the mes|sage dra|
|00000bf0| 66 74 20 61 6e 64 20 69 | 6e 76 6f 6b 65 20 64 65 |ft and i|nvoke de|
|00000c00| 66 61 75 6c 74 20 77 68 | 61 74 6e 6f 77 0a 58 20 |fault wh|atnow.X |
|00000c10| 20 2d 65 64 69 74 6f 72 | 20 65 64 69 74 6f 72 20 | -editor| editor |
|00000c20| 20 69 6e 76 6f 6b 65 20 | 74 68 65 20 73 70 65 63 | invoke |the spec|
|00000c30| 69 66 69 65 64 20 65 64 | 69 74 6f 72 20 66 6f 6c |ified ed|itor fol|
|00000c40| 6c 6f 77 69 6e 67 20 70 | 72 6f 63 65 73 73 69 6e |lowing p|rocessin|
|00000c50| 67 0a 58 20 20 2d 65 6e | 74 69 72 65 20 20 20 20 |g.X  -en|tire    |
|00000c60| 20 20 20 20 20 70 72 65 | 2d 70 72 6f 63 65 73 73 |     pre|-process|
|00000c70| 20 74 68 65 20 65 6e 74 | 69 72 65 20 6d 65 73 73 | the ent|ire mess|
|00000c80| 61 67 65 2c 20 69 6e 63 | 6c 75 64 69 6e 67 20 74 |age, inc|luding t|
|00000c90| 68 65 20 62 6f 64 79 0a | 58 20 20 2d 68 65 6c 70 |he body.|X  -help|
|00000ca0| 20 20 20 20 20 20 20 20 | 20 20 20 70 72 69 6e 74 |        |   print|
|00000cb0| 20 74 68 69 73 20 6d 65 | 73 73 61 67 65 0a 58 20 | this me|ssage.X |
|00000cc0| 20 2d 6e 6f 64 65 62 75 | 67 20 20 20 20 20 20 20 | -nodebu|g       |
|00000cd0| 20 6e 65 67 61 74 65 73 | 20 74 68 65 20 2d 64 65 | negates| the -de|
|00000ce0| 62 75 67 20 6f 70 74 69 | 6f 6e 0a 58 20 20 2d 6e |bug opti|on.X  -n|
|00000cf0| 6f 65 64 69 74 6f 72 20 | 20 20 20 20 20 20 64 69 |oeditor |      di|
|00000d00| 73 61 62 6c 65 73 20 61 | 75 74 6f 6d 61 74 69 63 |sables a|utomatic|
|00000d10| 20 69 6e 76 6f 63 61 74 | 69 6f 6e 20 6f 66 20 61 | invocat|ion of a|
|00000d20| 6e 20 65 64 69 74 6f 72 | 0a 58 20 20 2d 6e 6f 65 |n editor|.X  -noe|
|00000d30| 6e 74 69 72 65 20 20 20 | 20 20 20 20 6e 65 67 61 |ntire   |    nega|
|00000d40| 74 65 73 20 74 68 65 20 | 2d 65 6e 74 69 72 65 20 |tes the |-entire |
|00000d50| 6f 70 74 69 6f 6e 3b 20 | 6f 6e 6c 79 20 74 68 65 |option; |only the|
|00000d60| 20 68 65 61 64 65 72 20 | 69 73 20 70 72 6f 63 65 | header |is proce|
|00000d70| 73 73 65 64 0a 58 20 20 | 2d 6e 6f 76 65 72 62 6f |ssed.X  |-noverbo|
|00000d80| 73 65 20 20 20 20 20 20 | 6e 65 67 61 74 65 73 20 |se      |negates |
|00000d90| 74 68 65 20 2d 76 65 72 | 62 6f 73 65 20 6f 70 74 |the -ver|bose opt|
|00000da0| 69 6f 6e 0a 58 20 20 2d | 76 65 72 62 6f 73 65 20 |ion.X  -|verbose |
|00000db0| 20 20 20 20 20 20 20 70 | 72 69 6e 74 20 77 68 61 |       p|rint wha|
|00000dc0| 74 27 73 20 67 6f 69 6e | 67 20 6f 6e 20 61 73 20 |t's goin|g on as |
|00000dd0| 69 74 27 73 20 62 65 69 | 6e 67 20 64 6f 6e 65 0a |it's bei|ng done.|
|00000de0| 58 20 20 66 69 6c 65 20 | 20 20 20 20 20 20 20 20 |X  file |        |
|00000df0| 20 20 20 69 66 20 6f 6d | 69 74 74 65 64 2c 20 65 |   if om|itted, e|
|00000e00| 6e 76 61 72 20 5c 24 6d | 68 64 72 61 66 74 20 6e |nvar \$m|hdraft n|
|00000e10| 61 6d 65 73 20 74 68 65 | 20 64 72 61 66 74 20 66 |ames the| draft f|
|00000e20| 69 6c 65 0a 58 78 78 45 | 6e 64 48 65 6c 70 78 78 |ile.XxxE|ndHelpxx|
|00000e30| 0a 58 0a 58 20 20 20 20 | 20 20 65 78 69 74 20 31 |.X.X    |  exit 1|
|00000e40| 3b 0a 58 20 20 20 20 7d | 3b 0a 58 0a 58 20 20 2f |;.X    }|;.X.X  /|
|00000e50| 5e 2d 6e 6f 64 65 62 75 | 67 24 2f 20 26 26 20 64 |^-nodebu|g$/ && d|
|00000e60| 6f 20 7b 20 2d 2d 24 64 | 65 62 75 67 3b 20 6e 65 |o { --$d|ebug; ne|
|00000e70| 78 74 3b 20 7d 3b 0a 58 | 20 20 2f 5e 2d 6e 6f 65 |xt; };.X|  /^-noe|
|00000e80| 64 69 74 6f 72 24 7c 5e | 2d 6e 6f 65 64 69 74 24 |ditor$|^|-noedit$|
|00000e90| 2f 20 26 26 20 64 6f 20 | 7b 20 24 65 64 69 74 6f |/ && do |{ $edito|
|00000ea0| 72 20 3d 20 27 27 3b 20 | 6e 65 78 74 3b 20 7d 3b |r = ''; |next; };|
|00000eb0| 0a 58 20 20 2f 5e 2d 6e | 6f 65 6e 74 69 72 65 24 |.X  /^-n|oentire$|
|00000ec0| 2f 20 26 26 20 64 6f 20 | 7b 20 2d 2d 24 65 6e 74 |/ && do |{ --$ent|
|00000ed0| 69 72 65 3b 20 6e 65 78 | 74 3b 20 7d 3b 0a 58 20 |ire; nex|t; };.X |
|00000ee0| 20 2f 5e 2d 6e 6f 76 65 | 72 62 6f 73 65 24 2f 20 | /^-nove|rbose$/ |
|00000ef0| 26 26 20 64 6f 20 7b 20 | 2d 2d 24 76 65 72 62 6f |&& do { |--$verbo|
|00000f00| 73 65 3b 20 6e 65 78 74 | 3b 20 7d 3b 0a 58 0a 58 |se; next|; };.X.X|
|00000f10| 20 20 2f 5e 2d 76 65 72 | 62 6f 73 65 24 2f 20 26 |  /^-ver|bose$/ &|
|00000f20| 26 20 64 6f 20 7b 20 2b | 2b 24 76 65 72 62 6f 73 |& do { +|+$verbos|
|00000f30| 65 3b 20 6e 65 78 74 3b | 20 7d 3b 0a 58 0a 58 20 |e; next;| };.X.X |
|00000f40| 20 2f 5e 5b 5e 5c 2d 5d | 2f 20 26 26 20 64 6f 20 | /^[^\-]|/ && do |
|00000f50| 7b 20 24 66 69 6c 65 20 | 3d 20 24 5f 3b 20 6e 65 |{ $file |= $_; ne|
|00000f60| 78 74 3b 20 7d 3b 0a 58 | 0a 58 20 20 26 62 61 72 |xt; };.X|.X  &bar|
|00000f70| 66 28 22 75 6e 72 65 63 | 6f 67 6e 69 7a 65 64 20 |f("unrec|ognized |
|00000f80| 63 6f 6d 6d 61 6e 64 20 | 6c 69 6e 65 20 6f 70 74 |command |line opt|
|00000f90| 69 6f 6e 20 5c 22 24 5f | 5c 22 22 29 3b 0a 58 7d |ion \"$_|\"");.X}|
|00000fa0| 0a 58 0a 58 24 64 65 62 | 75 67 20 3d 20 24 64 65 |.X.X$deb|ug = $de|
|00000fb0| 62 75 67 20 3e 20 30 3b | 0a 58 24 65 6e 74 69 72 |bug > 0;|.X$entir|
|00000fc0| 65 20 3d 20 24 65 6e 74 | 69 72 65 20 3e 20 30 3b |e = $ent|ire > 0;|
|00000fd0| 0a 58 24 76 65 72 62 6f | 73 65 20 3d 20 24 76 65 |.X$verbo|se = $ve|
|00000fe0| 72 62 6f 73 65 20 3e 20 | 30 3b 0a 58 0a 58 23 20 |rbose > |0;.X.X# |
|00000ff0| 44 6f 20 73 6f 6d 65 20 | 69 6e 69 74 69 61 6c 20 |Do some |initial |
|00001000| 73 65 74 75 70 2e 0a 58 | 0a 58 24 74 65 6d 70 20 |setup..X|.X$temp |
|00001010| 3d 20 22 2f 74 6d 70 2f | 24 70 72 6f 67 2e 24 24 |= "/tmp/|$prog.$$|
|00001020| 22 3b 0a 58 24 53 49 47 | 7b 27 48 55 50 27 7d 20 |";.X$SIG|{'HUP'} |
|00001030| 3d 20 24 53 49 47 7b 27 | 49 4e 54 27 7d 20 3d 20 |= $SIG{'|INT'} = |
|00001040| 24 53 49 47 7b 27 54 45 | 52 4d 27 7d 20 3d 20 27 |$SIG{'TE|RM'} = '|
|00001050| 62 61 69 6c 27 3b 0a 58 | 0a 58 23 20 46 69 67 75 |bail';.X|.X# Figu|
|00001060| 72 65 20 6f 75 74 20 74 | 68 65 20 6e 61 6d 65 20 |re out t|he name |
|00001070| 6f 66 20 74 68 65 20 64 | 72 61 66 74 20 66 69 6c |of the d|raft fil|
|00001080| 65 0a 58 0a 58 69 66 20 | 28 21 20 24 66 69 6c 65 |e.X.Xif |(! $file|
|00001090| 29 20 7b 0a 58 20 20 69 | 66 20 28 64 65 66 69 6e |) {.X  i|f (defin|
|000010a0| 65 64 20 24 45 4e 56 7b | 27 6d 68 64 72 61 66 74 |ed $ENV{|'mhdraft|
|000010b0| 27 7d 29 20 7b 0a 58 20 | 20 20 20 24 66 69 6c 65 |'}) {.X |   $file|
|000010c0| 20 3d 20 24 45 4e 56 7b | 27 6d 68 64 72 61 66 74 | = $ENV{|'mhdraft|
|000010d0| 27 7d 3b 0a 58 20 20 7d | 0a 58 20 20 65 6c 73 65 |'};.X  }|.X  else|
|000010e0| 20 7b 0a 58 20 20 20 20 | 26 62 61 72 66 28 22 6e | {.X    |&barf("n|
|000010f0| 6f 20 64 72 61 66 74 20 | 66 69 6c 65 20 73 70 65 |o draft |file spe|
|00001100| 63 69 66 69 65 64 22 29 | 3b 0a 58 20 20 7d 0a 58 |cified")|;.X  }.X|
|00001110| 7d 0a 58 65 6c 73 65 20 | 7b 0a 58 20 20 24 45 4e |}.Xelse |{.X  $EN|
|00001120| 56 7b 27 6d 68 64 72 61 | 66 74 27 7d 20 3d 20 24 |V{'mhdra|ft'} = $|
|00001130| 66 69 6c 65 3b 0a 58 7d | 0a 58 0a 58 23 20 4c 65 |file;.X}|.X.X# Le|
|00001140| 74 27 73 20 73 74 61 72 | 74 20 72 75 6e 6e 69 6e |t's star|t runnin|
|00001150| 67 20 6f 75 72 20 64 69 | 72 74 79 20 66 69 6e 67 |g our di|rty fing|
|00001160| 65 72 73 20 6f 76 65 72 | 20 74 68 65 20 64 72 61 |ers over| the dra|
|00001170| 66 74 20 66 69 6c 65 2e | 2e 2e 0a 58 0a 58 26 62 |ft file.|...X.X&b|
|00001180| 61 72 66 28 22 63 61 6e | 27 74 20 6f 70 65 6e 20 |arf("can|'t open |
|00001190| 64 72 61 66 74 20 66 69 | 6c 65 20 5c 22 24 66 69 |draft fi|le \"$fi|
|000011a0| 6c 65 5c 22 20 2d 20 24 | 21 22 29 20 0a 58 09 75 |le\" - $|!") .X.u|
|000011b0| 6e 6c 65 73 73 20 6f 70 | 65 6e 28 44 52 41 46 54 |nless op|en(DRAFT|
|000011c0| 2c 20 22 3c 24 66 69 6c | 65 22 29 3b 0a 58 26 62 |, "<$fil|e");.X&b|
|000011d0| 61 72 66 28 22 63 61 6e | 27 74 20 63 72 65 61 74 |arf("can|'t creat|
|000011e0| 65 20 74 65 6d 70 6f 72 | 61 72 79 20 64 72 61 66 |e tempor|ary draf|
|000011f0| 74 20 66 69 6c 65 20 5c | 22 24 74 65 6d 70 5c 22 |t file \|"$temp\"|
|00001200| 20 2d 20 24 21 22 29 0a | 58 09 75 6e 6c 65 73 73 | - $!").|X.unless|
|00001210| 20 6f 70 65 6e 28 54 45 | 4d 50 2c 20 22 3e 24 74 | open(TE|MP, ">$t|
|00001220| 65 6d 70 22 29 3b 0a 58 | 0a 58 77 68 69 6c 65 20 |emp");.X|.Xwhile |
|00001230| 28 3c 44 52 41 46 54 3e | 29 20 7b 0a 58 20 20 6c |(<DRAFT>|) {.X  l|
|00001240| 61 73 74 20 69 66 20 28 | 2f 5e 24 7c 5e 2d 2f 20 |ast if (|/^$|^-/ |
|00001250| 26 26 20 21 20 24 65 6e | 74 69 72 65 29 3b 0a 58 |&& ! $en|tire);.X|
|00001260| 0a 58 20 20 69 66 20 28 | 2f 5c 60 28 2e 2b 29 5c |.X  if (|/\`(.+)\|
|00001270| 60 2f 29 20 7b 0a 58 20 | 20 20 20 24 74 6f 72 75 |`/) {.X |   $toru|
|00001280| 6e 20 3d 20 24 31 3b 0a | 58 20 20 20 20 24 70 72 |n = $1;.|X    $pr|
|00001290| 65 66 69 78 20 3d 20 24 | 60 3b 0a 58 20 20 20 20 |efix = $|`;.X    |
|000012a0| 24 73 75 66 66 69 78 20 | 3d 20 24 27 3b 0a 58 0a |$suffix |= $';.X.|
|000012b0| 58 20 20 20 20 70 72 69 | 6e 74 28 22 5c 74 24 74 |X    pri|nt("\t$t|
|000012c0| 6f 72 75 6e 5c 6e 22 29 | 20 69 66 20 28 24 76 65 |orun\n")| if ($ve|
|000012d0| 72 62 6f 73 65 20 7c 7c | 20 24 64 65 62 75 67 29 |rbose ||| $debug)|
|000012e0| 3b 0a 58 20 20 20 20 63 | 68 6f 70 28 24 72 65 73 |;.X    c|hop($res|
|000012f0| 75 6c 74 20 3d 20 60 24 | 74 6f 72 75 6e 60 29 3b |ult = `$|torun`);|
|00001300| 0a 58 20 20 20 20 69 66 | 20 28 24 3f 20 3e 3e 20 |.X    if| ($? >> |
|00001310| 38 29 20 7b 0a 58 20 20 | 20 20 20 20 26 67 72 69 |8) {.X  |    &gri|
|00001320| 70 65 28 22 24 66 69 6c | 65 3a 20 6c 69 6e 65 20 |pe("$fil|e: line |
|00001330| 24 2e 3a 20 63 6f 6d 6d | 61 6e 64 20 5c 22 24 74 |$.: comm|and \"$t|
|00001340| 6f 72 75 6e 5c 22 20 72 | 65 74 75 72 6e 65 64 20 |orun\" r|eturned |
|00001350| 65 72 72 6f 72 20 73 74 | 61 74 75 73 20 22 2c 0a |error st|atus ",.|
|00001360| 58 09 09 24 3f 20 3e 3e | 20 38 29 3b 0a 58 20 20 |X..$? >>| 8);.X  |
|00001370| 20 20 7d 0a 58 20 20 20 | 20 6e 65 78 74 20 69 66 |  }.X   | next if|
|00001380| 20 28 24 70 72 65 66 69 | 78 20 3d 7e 20 2f 5e 5c | ($prefi|x =~ /^\|
|00001390| 73 2a 24 7c 5e 5c 53 2b | 3a 5c 73 2a 24 2f 29 20 |s*$|^\S+|:\s*$/) |
|000013a0| 26 26 20 0a 58 09 20 20 | 20 20 28 24 73 75 66 66 |&& .X.  |  ($suff|
|000013b0| 69 78 20 3d 7e 20 2f 5e | 5c 73 2a 24 2f 29 20 26 |ix =~ /^|\s*$/) &|
|000013c0| 26 20 0a 58 09 20 20 20 | 20 21 20 24 72 65 73 75 |& .X.   | ! $resu|
|000013d0| 6c 74 3b 0a 58 09 09 23 | 20 49 66 20 74 68 65 72 |lt;.X..#| If ther|
|000013e0| 65 20 77 61 73 20 6e 6f | 20 72 65 73 75 6c 74 2c |e was no| result,|
|000013f0| 20 61 6e 64 20 74 68 65 | 72 65 20 77 61 73 20 6e | and the|re was n|
|00001400| 6f 74 68 69 6e 67 20 69 | 6d 70 6f 72 74 61 6e 74 |othing i|mportant|
|00001410| 0a 58 09 09 23 20 62 65 | 66 6f 72 65 20 6f 72 20 |.X..# be|fore or |
|00001420| 61 66 74 65 72 20 74 68 | 65 20 62 61 63 6b 74 69 |after th|e backti|
|00001430| 63 6b 20 63 6f 6e 73 74 | 72 75 63 74 2c 20 74 68 |ck const|ruct, th|
|00001440| 65 6e 20 64 6f 6e 27 74 | 20 65 76 65 6e 0a 58 09 |en don't| even.X.|
|00001450| 09 23 20 62 6f 74 68 65 | 72 20 70 72 69 6e 74 69 |.# bothe|r printi|
|00001460| 6e 67 20 61 20 6c 69 6e | 65 2e 20 20 54 68 69 73 |ng a lin|e.  This|
|00001470| 20 61 6c 6c 6f 77 73 20 | 75 73 20 74 6f 20 6f 6d | allows |us to om|
|00001480| 69 74 0a 58 09 09 23 20 | 68 65 61 64 65 72 20 63 |it.X..# |header c|
|00001490| 6f 6d 70 6f 6e 65 6e 74 | 73 20 70 72 6f 67 72 61 |omponent|s progra|
|000014a0| 6d 6d 61 74 69 63 61 6c | 6c 79 2e 0a 58 0a 58 20 |mmatical|ly..X.X |
|000014b0| 20 20 20 26 63 68 65 63 | 6b 28 70 72 69 6e 74 28 |   &chec|k(print(|
|000014c0| 54 45 4d 50 20 24 70 72 | 65 66 69 78 2c 20 24 72 |TEMP $pr|efix, $r|
|000014d0| 65 73 75 6c 74 2c 20 24 | 73 75 66 66 69 78 29 29 |esult, $|suffix))|
|000014e0| 3b 0a 58 20 20 7d 0a 58 | 20 20 65 6c 73 65 20 7b |;.X  }.X|  else {|
|000014f0| 0a 58 20 20 20 20 26 63 | 68 65 63 6b 28 70 72 69 |.X    &c|heck(pri|
|00001500| 6e 74 20 54 45 4d 50 20 | 24 5f 29 3b 0a 58 20 20 |nt TEMP |$_);.X  |
|00001510| 7d 0a 58 7d 0a 58 0a 58 | 69 66 20 28 21 20 24 65 |}.X}.X.X|if (! $e|
|00001520| 6e 74 69 72 65 29 20 7b | 0a 58 20 20 26 63 68 65 |ntire) {|.X  &che|
|00001530| 63 6b 28 70 72 69 6e 74 | 20 54 45 4d 50 20 22 2d |ck(print| TEMP "-|
|00001540| 2d 2d 2d 2d 2d 2d 5c 6e | 22 29 3b 0a 58 20 20 67 |------\n|");.X  g|
|00001550| 72 65 70 28 26 63 68 65 | 63 6b 28 70 72 69 6e 74 |rep(&che|ck(print|
|00001560| 20 54 45 4d 50 20 24 5f | 29 20 26 26 20 30 2c 20 | TEMP $_|) && 0, |
|00001570| 3c 44 52 41 46 54 3e 29 | 3b 0a 58 7d 0a 58 0a 58 |<DRAFT>)|;.X}.X.X|
|00001580| 26 62 61 72 66 28 22 70 | 72 6f 62 6c 65 6d 20 63 |&barf("p|roblem c|
|00001590| 6c 6f 73 69 6e 67 20 74 | 65 6d 70 6f 72 61 72 79 |losing t|emporary|
|000015a0| 20 64 72 61 66 74 20 66 | 69 6c 65 20 5c 22 24 74 | draft f|ile \"$t|
|000015b0| 65 6d 70 5c 22 20 2d 20 | 24 21 22 29 0a 58 09 75 |emp\" - |$!").X.u|
|000015c0| 6e 6c 65 73 73 20 63 6c | 6f 73 65 28 54 45 4d 50 |nless cl|ose(TEMP|
|000015d0| 29 3b 0a 58 0a 58 63 6c | 6f 73 65 28 44 52 41 46 |);.X.Xcl|ose(DRAF|
|000015e0| 54 29 3b 0a 58 0a 58 26 | 73 68 28 22 63 70 20 24 |T);.X.X&|sh("cp $|
|000015f0| 74 65 6d 70 20 24 66 69 | 6c 65 22 29 3b 0a 58 73 |temp $fi|le");.Xs|
|00001600| 79 73 74 65 6d 28 27 2f | 62 69 6e 2f 63 61 74 27 |ystem('/|bin/cat'|
|00001610| 2c 20 24 74 65 6d 70 29 | 20 69 66 20 24 64 65 62 |, $temp)| if $deb|
|00001620| 75 67 3b 0a 58 0a 58 70 | 72 69 6e 74 28 22 5c 74 |ug;.X.Xp|rint("\t|
|00001630| 72 6d 20 24 74 65 6d 70 | 5c 6e 22 29 20 69 66 20 |rm $temp|\n") if |
|00001640| 28 24 76 65 72 62 6f 73 | 65 20 7c 7c 20 24 64 65 |($verbos|e || $de|
|00001650| 62 75 67 29 3b 0a 58 75 | 6e 6c 69 6e 6b 20 24 74 |bug);.Xu|nlink $t|
|00001660| 65 6d 70 3b 0a 58 0a 58 | 26 73 68 28 22 24 65 64 |emp;.X.X|&sh("$ed|
|00001670| 69 74 6f 72 20 24 66 69 | 6c 65 22 29 20 69 66 20 |itor $fi|le") if |
|00001680| 24 65 64 69 74 6f 72 3b | 0a 5f 5f 5f 5f 5f 5f 5f |$editor;|._______|
|00001690| 5f 54 68 69 73 5f 49 73 | 5f 54 68 65 5f 45 4e 44 |_This_Is|_The_END|
|000016a0| 5f 5f 5f 5f 5f 5f 5f 5f | 0a 69 66 20 74 65 73 74 |________|.if test|
|000016b0| 20 60 77 63 20 2d 6c 20 | 3c 20 6d 68 70 70 65 64 | `wc -l |< mhpped|
|000016c0| 60 20 2d 6e 65 20 32 31 | 33 3b 20 74 68 65 6e 0a |` -ne 21|3; then.|
|000016d0| 09 65 63 68 6f 20 27 73 | 68 61 72 3a 20 6d 68 70 |.echo 's|har: mhp|
|000016e0| 70 65 64 20 77 61 73 20 | 64 61 6d 61 67 65 64 20 |ped was |damaged |
|000016f0| 64 75 72 69 6e 67 20 74 | 72 61 6e 73 69 74 20 28 |during t|ransit (|
|00001700| 73 68 6f 75 6c 64 20 68 | 61 76 65 20 62 65 65 6e |should h|ave been|
|00001710| 20 32 31 33 20 62 79 74 | 65 73 29 27 0a 66 69 0a | 213 byt|es)'.fi.|
|00001720| 66 69 09 09 3b 20 3a 20 | 65 6e 64 20 6f 66 20 6f |fi..; : |end of o|
|00001730| 76 65 72 77 72 69 74 69 | 6e 67 20 63 68 65 63 6b |verwriti|ng check|
|00001740| 0a 65 63 68 6f 20 27 78 | 20 2d 20 6d 68 70 70 65 |.echo 'x| - mhppe|
|00001750| 64 2e 6c 27 0a 69 66 20 | 74 65 73 74 20 2d 66 20 |d.l'.if |test -f |
|00001760| 6d 68 70 70 65 64 2e 6c | 3b 20 74 68 65 6e 20 65 |mhpped.l|; then e|
|00001770| 63 68 6f 20 27 73 68 61 | 72 3a 20 6e 6f 74 20 6f |cho 'sha|r: not o|
|00001780| 76 65 72 77 72 69 74 69 | 6e 67 20 6d 68 70 70 65 |verwriti|ng mhppe|
|00001790| 64 2e 6c 27 3b 20 65 6c | 73 65 0a 73 65 64 20 27 |d.l'; el|se.sed '|
|000017a0| 73 2f 5e 58 2f 2f 27 20 | 3c 3c 20 27 5f 5f 5f 5f |s/^X//' |<< '____|
|000017b0| 5f 5f 5f 5f 54 68 69 73 | 5f 49 73 5f 54 68 65 5f |____This|_Is_The_|
|000017c0| 45 4e 44 5f 5f 5f 5f 5f | 5f 5f 5f 27 20 3e 20 6d |END_____|___' > m|
|000017d0| 68 70 70 65 64 2e 6c 0a | 58 2e 5c 22 20 24 48 65 |hpped.l.|X.\" $He|
|000017e0| 61 64 65 72 3a 20 2f 75 | 73 72 2f 74 2f 75 73 65 |ader: /u|sr/t/use|
|000017f0| 72 73 2f 6a 73 77 65 65 | 74 2f 73 72 63 2f 6d 68 |rs/jswee|t/src/mh|
|00001800| 2d 66 72 6f 6e 74 2f 52 | 43 53 2f 6d 68 70 70 65 |-front/R|CS/mhppe|
|00001810| 64 2e 6c 2c 76 20 31 2e | 32 20 31 39 39 32 2f 31 |d.l,v 1.|2 1992/1|
|00001820| 31 2f 31 32 20 30 31 3a | 35 33 3a 32 38 20 6a 73 |1/12 01:|53:28 js|
|00001830| 77 65 65 74 20 45 78 70 | 20 24 0a 58 2e 5c 22 0a |weet Exp| $.X.\".|
|00001840| 58 2e 5c 22 20 54 68 65 | 73 65 20 64 65 66 69 6e |X.\" The|se defin|
|00001850| 69 74 69 6f 6e 73 20 77 | 65 72 65 20 62 6f 72 72 |itions w|ere borr|
|00001860| 6f 77 65 64 20 66 72 6f | 6d 20 74 68 65 20 4d 48 |owed fro|m the MH|
|00001870| 20 64 6f 63 73 2e 0a 58 | 2e 5c 22 0a 58 2e 2e 66 | docs..X|.\".X..f|
|00001880| 63 20 5e 20 7e 0a 58 2e | 5c 22 20 49 20 70 69 74 |c ^ ~.X.|\" I pit|
|00001890| 79 20 74 68 65 20 66 6f | 6f 6c 20 77 68 6f 20 74 |y the fo|ol who t|
|000018a0| 61 6d 70 65 72 73 20 77 | 69 74 68 20 74 68 65 20 |ampers w|ith the |
|000018b0| 6e 65 78 74 20 6c 69 6e | 65 2e 2e 2e 0a 58 2e 64 |next lin|e....X.d|
|000018c0| 73 20 5a 5a 20 2d 6d 61 | 6e 0a 58 2e 64 65 20 53 |s ZZ -ma|n.X.de S|
|000018d0| 43 09 09 09 09 09 5c 22 | 20 54 69 74 6c 65 20 73 |C.....\"| Title s|
|000018e0| 65 63 74 69 6f 6e 0a 58 | 2e 54 48 20 5c 5c 24 31 |ection.X|.TH \\$1|
|000018f0| 20 5c 5c 24 32 20 4d 48 | 50 50 45 44 0a 58 2e 2e | \\$2 MH|PPED.X..|
|00001900| 0a 58 2e 64 65 20 4e 41 | 09 09 09 09 09 5c 22 20 |.X.de NA|.....\" |
|00001910| 4e 61 6d 65 20 73 65 63 | 74 69 6f 6e 0a 58 2e 53 |Name sec|tion.X.S|
|00001920| 48 20 4e 41 4d 45 0a 58 | 2e 2e 0a 58 2e 64 65 20 |H NAME.X|...X.de |
|00001930| 53 59 09 09 09 09 09 5c | 22 20 53 79 6e 6f 70 73 |SY.....\|" Synops|
|00001940| 69 73 20 73 65 63 74 69 | 6f 6e 0a 58 2e 53 48 20 |is secti|on.X.SH |
|00001950| 53 59 4e 4f 50 53 49 53 | 0a 58 2e 69 6e 20 2b 2e |SYNOPSIS|.X.in +.|
|00001960| 35 69 0a 58 2e 74 69 20 | 2d 2e 35 69 0a 58 2e 2e |5i.X.ti |-.5i.X..|
|00001970| 0a 58 2e 64 65 20 44 45 | 09 09 09 09 09 5c 22 20 |.X.de DE|.....\" |
|00001980| 44 65 73 63 72 69 70 74 | 69 6f 6e 20 73 65 63 74 |Descript|ion sect|
|00001990| 69 6f 6e 0a 58 2e 69 6e | 20 2d 2e 35 69 0a 58 2e |ion.X.in| -.5i.X.|
|000019a0| 53 48 20 44 45 53 43 52 | 49 50 54 49 4f 4e 0a 58 |SH DESCR|IPTION.X|
|000019b0| 2e 2e 0a 58 2e 64 65 20 | 44 65 09 09 09 09 09 5c |...X.de |De.....\|
|000019c0| 22 20 44 65 66 61 75 6c | 74 73 20 73 65 63 74 69 |" Defaul|ts secti|
|000019d0| 6f 6e 0a 58 2e 53 48 20 | 22 44 45 46 41 55 4c 54 |on.X.SH |"DEFAULT|
|000019e0| 53 22 0a 58 2e 6e 66 0a | 58 2e 2e 0a 58 2e 64 65 |S".X.nf.|X...X.de|
|000019f0| 20 42 75 09 09 09 09 09 | 5c 22 20 42 75 67 73 20 | Bu.....|\" Bugs |
|00001a00| 73 65 63 74 69 6f 6e 0a | 58 2e 66 69 0a 58 2e 53 |section.|X.fi.X.S|
|00001a10| 48 20 42 55 47 53 0a 58 | 2e 2e 0a 58 2e 64 65 20 |H BUGS.X|...X.de |
|00001a20| 45 6e 0a 58 2e 2e 0a 58 | 2e 64 65 20 69 70 0a 58 |En.X...X|.de ip.X|
|00001a30| 2e 49 50 20 22 5c 5c 24 | 31 22 20 5c 5c 24 32 0a |.IP "\\$|1" \\$2.|
|00001a40| 58 2e 2e 0a 58 2e 53 43 | 20 4d 48 50 50 45 44 20 |X...X.SC| MHPPED |
|00001a50| 31 20 6c 6f 63 61 6c 0a | 58 2e 4e 41 0a 58 6d 68 |1 local.|X.NA.Xmh|
|00001a60| 70 70 65 64 20 5c 2d 20 | 70 72 65 2d 70 72 6f 63 |pped \- |pre-proc|
|00001a70| 65 73 73 20 62 61 63 6b | 74 69 63 6b 73 20 69 6e |ess back|ticks in|
|00001a80| 20 4d 48 20 63 6f 6d 70 | 6f 73 69 74 69 6f 6e 20 | MH comp|osition |
|00001a90| 74 65 6d 70 6c 61 74 65 | 73 0a 58 2e 53 59 0a 58 |template|s.X.SY.X|
|00001aa0| 6d 68 70 70 65 64 0a 58 | 5c 25 5b 5c 2d 28 6e 6f |mhpped.X|\%[\-(no|
|00001ab0| 29 64 65 62 75 67 5d 0a | 58 5c 25 5b 5c 2d 65 64 |)debug].|X\%[\-ed|
|00001ac0| 69 74 6f 72 20 65 64 69 | 74 6f 72 5d 0a 58 5c 25 |itor edi|tor].X\%|
|00001ad0| 5b 5c 2d 6e 6f 65 64 69 | 74 6f 72 5d 0a 58 5c 25 |[\-noedi|tor].X\%|
|00001ae0| 5b 5c 2d 28 6e 6f 29 65 | 6e 74 69 72 65 5d 0a 58 |[\-(no)e|ntire].X|
|00001af0| 5c 25 5b 5c 2d 28 6e 6f | 29 76 65 72 62 6f 73 65 |\%[\-(no|)verbose|
|00001b00| 5d 0a 58 5c 25 5b 66 69 | 6c 65 5d 0a 58 2e 44 45 |].X\%[fi|le].X.DE|
|00001b10| 0a 58 4d 68 70 70 65 64 | 20 70 72 65 2d 70 72 6f |.XMhpped| pre-pro|
|00001b20| 63 65 73 73 65 73 20 73 | 68 65 6c 6c 2d 6c 69 6b |cesses s|hell-lik|
|00001b30| 65 20 62 61 63 6b 74 69 | 63 6b 73 20 28 60 60 29 |e backti|cks (``)|
|00001b40| 20 69 6e 0a 58 65 2d 6d | 61 69 6c 20 6d 65 73 73 | in.Xe-m|ail mess|
|00001b50| 61 67 65 20 63 6f 6d 70 | 6f 73 69 74 69 6f 6e 20 |age comp|osition |
|00001b60| 74 65 6d 70 6c 61 74 65 | 73 20 75 73 65 64 20 62 |template|s used b|
|00001b70| 79 20 63 6f 6d 70 2c 20 | 72 65 70 6c 2c 20 61 6e |y comp, |repl, an|
|00001b80| 64 20 66 6f 72 77 2e 0a | 58 45 61 63 68 20 73 68 |d forw..|XEach sh|
|00001b90| 65 6c 6c 20 63 6f 6d 6d | 61 6e 64 20 69 6e 73 69 |ell comm|and insi|
|00001ba0| 64 65 20 61 20 70 61 69 | 72 20 6f 66 20 62 61 63 |de a pai|r of bac|
|00001bb0| 6b 74 69 63 6b 73 20 69 | 73 20 65 78 65 63 75 74 |kticks i|s execut|
|00001bc0| 65 64 20 76 69 61 20 2f | 62 69 6e 2f 73 68 2c 0a |ed via /|bin/sh,.|
|00001bd0| 58 61 6e 64 20 74 68 65 | 20 72 65 73 75 6c 74 69 |Xand the| resulti|
|00001be0| 6e 67 20 6f 75 74 70 75 | 74 20 69 73 20 73 75 62 |ng outpu|t is sub|
|00001bf0| 73 74 69 74 75 74 65 64 | 20 69 6e 74 6f 20 74 68 |stituted| into th|
|00001c00| 65 20 68 65 61 64 65 72 | 20 63 6f 6d 70 6f 6e 65 |e header| compone|
|00001c10| 6e 74 2e 0a 58 0a 58 49 | 66 20 74 68 65 20 72 65 |nt..X.XI|f the re|
|00001c20| 73 75 6c 74 20 6f 66 20 | 61 20 62 61 63 6b 74 69 |sult of |a backti|
|00001c30| 63 6b 20 63 6f 6e 73 74 | 72 75 63 74 20 69 73 20 |ck const|ruct is |
|00001c40| 65 6d 70 74 79 2c 20 61 | 6e 64 20 6e 6f 74 68 69 |empty, a|nd nothi|
|00001c50| 6e 67 0a 58 22 69 6d 70 | 6f 72 74 61 6e 74 22 20 |ng.X"imp|ortant" |
|00001c60| 73 75 72 72 6f 75 6e 64 | 73 20 74 68 65 20 62 61 |surround|s the ba|
|00001c70| 63 6b 74 69 63 6b 20 63 | 6f 6e 73 74 72 75 63 74 |cktick c|onstruct|
|00001c80| 2c 20 74 68 65 6e 20 74 | 68 65 20 65 6e 74 69 72 |, then t|he entir|
|00001c90| 65 20 68 65 61 64 65 72 | 0a 58 63 6f 6d 70 6f 6e |e header|.Xcompon|
|00001ca0| 65 6e 74 20 69 73 20 6f | 6d 69 74 74 65 64 2e 20 |ent is o|mitted. |
|00001cb0| 20 0a 58 54 68 65 20 63 | 72 69 74 65 72 69 6f 6e | .XThe c|riterion|
|00001cc0| 20 66 6f 72 20 61 6e 20 | 22 69 6d 70 6f 72 74 61 | for an |"importa|
|00001cd0| 6e 74 22 20 73 74 72 69 | 6e 67 20 70 72 65 63 65 |nt" stri|ng prece|
|00001ce0| 64 69 6e 67 20 74 68 65 | 20 62 61 63 6b 74 69 63 |ding the| backtic|
|00001cf0| 6b 0a 58 63 6f 6e 73 74 | 72 75 63 74 20 69 73 20 |k.Xconst|ruct is |
|00001d00| 73 6f 6d 65 74 68 69 6e | 67 20 74 68 61 74 20 6c |somethin|g that l|
|00001d10| 6f 6f 6b 73 20 6e 65 69 | 74 68 65 72 20 6c 69 6b |ooks nei|ther lik|
|00001d20| 65 20 61 20 68 65 61 64 | 65 72 20 63 6f 6d 70 6f |e a head|er compo|
|00001d30| 6e 65 6e 74 20 6e 6f 72 | 0a 58 6c 69 6b 65 20 77 |nent nor|.Xlike w|
|00001d40| 68 69 74 65 73 70 61 63 | 65 2e 20 20 0a 58 54 68 |hitespac|e.  .XTh|
|00001d50| 65 20 63 72 69 74 65 72 | 69 6f 6e 20 66 6f 72 20 |e criter|ion for |
|00001d60| 61 6e 20 22 69 6d 70 6f | 72 74 61 6e 74 22 20 73 |an "impo|rtant" s|
|00001d70| 74 72 69 6e 67 20 66 6f | 6c 6c 6f 77 69 6e 67 20 |tring fo|llowing |
|00001d80| 74 68 65 20 62 61 63 6b | 74 69 63 6b 0a 58 63 6f |the back|tick.Xco|
|00001d90| 6e 73 74 72 75 63 74 20 | 69 73 20 73 6f 6d 65 74 |nstruct |is somet|
|00001da0| 68 69 6e 67 20 74 68 61 | 74 20 69 73 6e 27 74 20 |hing tha|t isn't |
|00001db0| 77 68 69 74 65 73 70 61 | 63 65 2e 0a 58 0a 58 4f |whitespa|ce..X.XO|
|00001dc0| 6e 6c 79 20 74 68 65 20 | 68 65 61 64 65 72 20 63 |nly the |header c|
|00001dd0| 6f 6d 70 6f 6e 65 6e 74 | 73 20 61 72 65 20 70 72 |omponent|s are pr|
|00001de0| 6f 63 65 73 73 65 64 20 | 75 6e 6c 65 73 73 20 2d |ocessed |unless -|
|00001df0| 65 6e 74 69 72 65 0a 58 | 69 73 20 73 70 65 63 69 |entire.X|is speci|
|00001e00| 66 69 65 64 2e 0a 58 49 | 66 20 2d 65 6e 74 69 72 |fied..XI|f -entir|
|00001e10| 65 20 69 73 20 73 70 65 | 63 69 66 69 65 64 20 74 |e is spe|cified t|
|00001e20| 68 65 6e 20 62 61 63 6b | 74 69 63 6b 73 20 69 6e |hen back|ticks in|
|00001e30| 20 74 68 65 20 6d 65 73 | 73 61 67 65 20 63 6f 6d | the mes|sage com|
|00001e40| 70 6f 73 69 74 69 6f 6e | 20 74 65 6d 70 6c 61 74 |position| templat|
|00001e50| 65 0a 58 62 6f 64 79 20 | 61 73 20 77 65 6c 6c 20 |e.Xbody |as well |
|00001e60| 61 73 20 69 6e 20 74 68 | 65 20 68 65 61 64 65 72 |as in th|e header|
|00001e70| 20 61 72 65 20 70 72 6f | 63 65 73 73 65 64 2e 0a | are pro|cessed..|
|00001e80| 58 74 68 65 20 2d 6e 6f | 65 6e 74 69 72 65 20 6f |Xthe -no|entire o|
|00001e90| 70 74 69 6f 6e 20 6e 65 | 67 61 74 65 73 20 74 68 |ption ne|gates th|
|00001ea0| 65 20 2d 65 6e 74 69 72 | 65 20 6f 70 74 69 6f 6e |e -entir|e option|
|00001eb0| 2e 0a 58 54 68 65 20 64 | 65 66 61 75 6c 74 20 69 |..XThe d|efault i|
|00001ec0| 73 20 2d 6e 6f 65 6e 74 | 69 72 65 2e 0a 58 0a 58 |s -noent|ire..X.X|
|00001ed0| 54 68 65 20 2d 65 64 69 | 74 6f 72 20 6f 70 74 69 |The -edi|tor opti|
|00001ee0| 6f 6e 20 73 70 65 63 69 | 66 69 65 73 20 61 6e 20 |on speci|fies an |
|00001ef0| 65 64 69 74 6f 72 20 70 | 72 6f 67 72 61 6d 20 74 |editor p|rogram t|
|00001f00| 6f 20 69 6e 76 6f 6b 65 | 20 61 66 74 65 72 20 70 |o invoke| after p|
|00001f10| 72 6f 63 65 73 73 69 6e | 67 2e 0a 58 54 68 65 20 |rocessin|g..XThe |
|00001f20| 2d 6e 6f 65 64 69 74 20 | 6f 70 74 69 6f 6e 20 6e |-noedit |option n|
|00001f30| 65 67 61 74 65 73 20 74 | 68 65 20 2d 65 64 69 74 |egates t|he -edit|
|00001f40| 6f 72 20 6f 70 74 69 6f | 6e 2e 0a 58 54 68 65 20 |or optio|n..XThe |
|00001f50| 64 65 66 61 75 6c 74 20 | 69 73 20 2d 6e 6f 65 64 |default |is -noed|
|00001f60| 69 74 2e 0a 58 49 66 20 | 74 68 65 20 4d 48 20 70 |it..XIf |the MH p|
|00001f70| 72 6f 66 69 6c 65 20 63 | 6f 6d 70 6f 6e 65 6e 74 |rofile c|omponent|
|00001f80| 20 22 6d 68 70 70 65 64 | 2d 6e 65 78 74 22 20 69 | "mhpped|-next" i|
|00001f90| 73 20 70 72 65 73 65 6e | 74 2c 20 0a 58 74 68 65 |s presen|t, .Xthe|
|00001fa0| 6e 20 77 68 61 74 6e 6f | 77 28 31 29 20 77 69 6c |n whatno|w(1) wil|
|00001fb0| 6c 20 75 73 65 20 74 68 | 65 20 65 64 69 74 6f 72 |l use th|e editor|
|00001fc0| 20 73 70 65 63 69 66 69 | 65 64 20 69 6e 20 74 68 | specifi|ed in th|
|00001fd0| 61 74 20 63 6f 6d 70 6f | 6e 65 6e 74 20 77 68 65 |at compo|nent whe|
|00001fe0| 6e 20 22 65 64 69 74 22 | 0a 58 69 73 20 74 79 70 |n "edit"|.Xis typ|
|00001ff0| 65 64 20 61 74 20 74 68 | 65 20 22 57 68 61 74 20 |ed at th|e "What |
|00002000| 6e 6f 77 3f 22 20 70 72 | 6f 6d 70 74 2e 0a 58 0a |now?" pr|ompt..X.|
|00002010| 58 54 68 65 20 2d 68 65 | 6c 70 20 6f 70 74 69 6f |XThe -he|lp optio|
|00002020| 6e 20 70 72 69 6e 74 73 | 20 61 20 68 65 6c 70 20 |n prints| a help |
|00002030| 6d 65 73 73 61 67 65 20 | 61 6e 64 20 65 78 69 74 |message |and exit|
|00002040| 73 2e 0a 58 0a 58 54 68 | 65 20 2d 76 65 72 62 6f |s..X.XTh|e -verbo|
|00002050| 73 65 20 6f 70 74 69 6f | 6e 20 63 61 75 73 65 73 |se optio|n causes|
|00002060| 20 6d 68 70 70 65 64 20 | 74 6f 20 70 72 69 6e 74 | mhpped |to print|
|00002070| 20 74 68 65 20 63 6f 6d | 6d 61 6e 64 73 20 62 65 | the com|mands be|
|00002080| 69 6e 67 20 65 78 65 63 | 75 74 65 64 0a 58 69 6e |ing exec|uted.Xin|
|00002090| 20 74 68 65 20 62 61 63 | 6b 74 69 63 6b 73 2c 20 | the bac|kticks, |
|000020a0| 61 73 20 77 65 6c 6c 20 | 61 73 20 6d 69 73 63 65 |as well |as misce|
|000020b0| 6c 6c 61 6e 65 6f 75 73 | 20 73 68 65 6c 6c 20 63 |llaneous| shell c|
|000020c0| 6f 6d 6d 61 6e 64 73 20 | 65 78 65 63 75 74 65 64 |ommands |executed|
|000020d0| 0a 58 62 79 20 6d 68 70 | 70 65 64 2e 0a 58 54 68 |.Xby mhp|ped..XTh|
|000020e0| 65 20 2d 6e 6f 76 65 72 | 62 6f 73 65 20 6f 70 74 |e -nover|bose opt|
|000020f0| 69 6f 6e 20 6e 65 67 61 | 74 65 73 20 74 68 65 20 |ion nega|tes the |
|00002100| 2d 76 65 72 62 6f 73 65 | 20 6f 70 74 69 6f 6e 2e |-verbose| option.|
|00002110| 0a 58 54 68 65 20 64 65 | 66 61 75 6c 74 20 69 73 |.XThe de|fault is|
|00002120| 20 2d 6e 6f 76 65 72 62 | 6f 73 65 2e 0a 58 0a 58 | -noverb|ose..X.X|
|00002130| 54 68 65 20 2d 64 65 62 | 75 67 20 6f 70 74 69 6f |The -deb|ug optio|
|00002140| 6e 20 61 6c 73 6f 20 70 | 72 69 6e 74 73 20 74 68 |n also p|rints th|
|00002150| 65 20 63 6f 6d 6d 61 6e | 64 73 2c 20 62 75 74 20 |e comman|ds, but |
|00002160| 64 6f 65 73 20 6e 6f 74 | 20 65 78 65 63 75 74 65 |does not| execute|
|00002170| 20 74 68 65 6d 2e 0a 58 | 54 68 65 20 2d 6e 6f 64 | them..X|The -nod|
|00002180| 65 62 75 67 20 6f 70 74 | 69 6f 6e 20 6e 65 67 61 |ebug opt|ion nega|
|00002190| 74 65 73 20 74 68 65 20 | 2d 64 65 62 75 67 20 6f |tes the |-debug o|
|000021a0| 70 74 69 6f 6e 2e 0a 58 | 54 68 65 20 64 65 66 61 |ption..X|The defa|
|000021b0| 75 6c 74 20 69 73 20 2d | 6e 6f 64 65 62 75 67 2e |ult is -|nodebug.|
|000021c0| 0a 58 0a 58 2e 53 48 20 | 45 58 41 4d 50 4c 45 0a |.X.X.SH |EXAMPLE.|
|000021d0| 58 0a 58 59 6f 75 20 6d | 61 79 20 69 6e 73 74 61 |X.XYou m|ay insta|
|000021e0| 6c 6c 20 6d 68 70 70 65 | 64 20 69 6e 20 61 6e 79 |ll mhppe|d in any|
|000021f0| 20 64 69 72 65 63 74 6f | 72 79 20 6f 63 63 75 72 | directo|ry occur|
|00002200| 72 69 6e 67 20 69 6e 20 | 79 6f 75 72 20 24 50 41 |ring in |your $PA|
|00002210| 54 48 0a 58 65 6e 76 69 | 72 6f 6e 6d 65 6e 74 20 |TH.Xenvi|ronment |
|00002220| 76 61 72 69 61 62 6c 65 | 2e 20 20 4d 79 20 63 6f |variable|.  My co|
|00002230| 70 79 20 69 73 20 69 6e | 73 74 61 6c 6c 65 64 20 |py is in|stalled |
|00002240| 69 6e 20 6d 79 20 70 65 | 72 73 6f 6e 61 6c 20 62 |in my pe|rsonal b|
|00002250| 69 6e 0a 58 64 69 72 65 | 63 74 6f 72 79 2c 20 22 |in.Xdire|ctory, "|
|00002260| 7e 2f 62 69 6e 22 2e 0a | 58 0a 58 4f 6e 63 65 20 |~/bin"..|X.XOnce |
|00002270| 6d 68 70 70 65 64 20 68 | 61 73 20 62 65 65 6e 20 |mhpped h|as been |
|00002280| 69 6e 73 74 61 6c 6c 65 | 64 2c 20 0a 58 79 6f 75 |installe|d, .Xyou|
|00002290| 20 6d 61 79 20 73 70 65 | 63 69 66 79 20 61 6e 20 | may spe|cify an |
|000022a0| 22 5c 2d 65 64 69 74 6f | 72 5c 20 6d 68 70 70 65 |"\-edito|r\ mhppe|
|000022b0| 64 22 20 6f 70 74 69 6f | 6e 20 66 6f 72 20 63 6f |d" optio|n for co|
|000022c0| 6d 70 2c 20 66 6f 72 77 | 2c 20 6f 72 20 72 65 70 |mp, forw|, or rep|
|000022d0| 6c 2e 0a 58 0a 58 59 6f | 75 20 6d 61 79 20 61 6c |l..X.XYo|u may al|
|000022e0| 73 6f 20 69 6e 76 65 6e | 74 20 79 6f 75 72 20 6f |so inven|t your o|
|000022f0| 77 6e 20 6d 61 69 6c 20 | 63 6f 6d 70 6f 73 69 74 |wn mail |composit|
|00002300| 69 6f 6e 20 63 6f 6d 6d | 61 6e 64 73 2c 20 61 6e |ion comm|ands, an|
|00002310| 64 20 73 70 65 63 69 66 | 79 20 22 6d 68 70 70 65 |d specif|y "mhppe|
|00002320| 64 22 0a 58 61 73 20 74 | 68 65 20 64 65 66 61 75 |d".Xas t|he defau|
|00002330| 6c 74 20 65 64 69 74 6f | 72 20 69 6e 20 74 68 65 |lt edito|r in the|
|00002340| 20 61 70 70 72 6f 70 72 | 69 61 74 65 20 4d 48 20 | appropr|iate MH |
|00002350| 70 72 6f 66 69 6c 65 20 | 63 6f 6d 70 6f 6e 65 6e |profile |componen|
|00002360| 74 2e 0a 58 0a 58 48 65 | 72 65 20 69 73 20 61 6e |t..X.XHe|re is an|
|00002370| 20 65 78 61 6d 70 6c 65 | 20 74 65 73 74 20 63 6f | example| test co|
|00002380| 6e 66 69 67 75 72 61 74 | 69 6f 6e 20 75 73 69 6e |nfigurat|ion usin|
|00002390| 67 20 6d 68 70 70 65 64 | 20 77 69 74 68 20 61 20 |g mhpped| with a |
|000023a0| 76 65 72 73 69 6f 6e 20 | 6f 66 20 63 6f 6d 70 0a |version |of comp.|
|000023b0| 58 6e 61 6d 65 64 20 22 | 70 70 63 6f 6d 70 22 2e |Xnamed "|ppcomp".|
|000023c0| 0a 58 46 69 72 73 74 2c | 20 72 75 6e 20 74 68 65 |.XFirst,| run the|
|000023d0| 73 65 20 63 73 68 20 63 | 6f 6d 6d 61 6e 64 73 20 |se csh c|ommands |
|000023e0| 74 6f 20 63 72 65 61 74 | 65 20 74 68 65 20 22 70 |to creat|e the "p|
|000023f0| 70 63 6f 6d 70 22 20 63 | 6f 6d 6d 61 6e 64 3a 0a |pcomp" c|ommand:.|
|00002400| 58 2e 50 50 0a 58 2e 69 | 6e 20 2b 2e 35 69 0a 58 |X.PP.X.i|n +.5i.X|
|00002410| 20 20 20 20 25 20 6c 6e | 20 2d 73 20 60 77 68 69 |    % ln| -s `whi|
|00002420| 63 68 20 63 6f 6d 70 60 | 20 7e 2f 62 69 6e 2f 70 |ch comp`| ~/bin/p|
|00002430| 70 63 6f 6d 70 0a 58 2e | 62 72 0a 58 20 20 20 20 |pcomp.X.|br.X    |
|00002440| 25 20 72 65 68 61 73 68 | 0a 58 2e 69 6e 20 2d 2e |% rehash|.X.in -.|
|00002450| 35 69 0a 58 2e 50 50 0a | 58 54 68 65 6e 20 69 6e |5i.X.PP.|XThen in|
|00002460| 20 79 6f 75 72 20 2e 6d | 68 5f 70 72 6f 66 69 6c | your .m|h_profil|
|00002470| 65 2c 20 61 64 64 20 74 | 68 65 73 65 20 6c 69 6e |e, add t|hese lin|
|00002480| 65 73 3a 0a 58 2e 50 50 | 0a 58 2e 69 6e 20 2b 2e |es:.X.PP|.X.in +.|
|00002490| 35 69 0a 58 70 70 63 6f | 6d 70 3a 5c 20 5c 20 5c |5i.Xppco|mp:\ \ \|
|000024a0| 20 5c 20 5c 20 5c 20 5c | 20 5c 20 5c 20 5c 2d 65 | \ \ \ \| \ \ \-e|
|000024b0| 64 69 74 6f 72 5c 20 6d | 68 70 70 65 64 5c 20 5c |ditor\ m|hpped\ \|
|000024c0| 2d 66 6f 72 6d 5c 20 63 | 6f 6d 70 6f 6e 65 6e 74 |-form\ c|omponent|
|000024d0| 73 2e 74 0a 58 2e 62 72 | 0a 58 6d 68 70 70 65 64 |s.t.X.br|.Xmhpped|
|000024e0| 3a 5c 20 5c 20 5c 20 5c | 20 5c 20 5c 20 5c 20 5c |:\ \ \ \| \ \ \ \|
|000024f0| 20 5c 20 5c 2d 65 6e 74 | 69 72 65 5c 20 5c 2d 76 | \ \-ent|ire\ \-v|
|00002500| 65 72 62 6f 73 65 5c 20 | 5c 2d 65 64 69 74 6f 72 |erbose\ |\-editor|
|00002510| 5c 20 70 72 6f 6d 70 74 | 65 72 0a 58 2e 69 6e 20 |\ prompt|er.X.in |
|00002520| 2d 2e 35 69 0a 58 2e 50 | 50 0a 58 54 68 65 6e 20 |-.5i.X.P|P.XThen |
|00002530| 69 6e 20 79 6f 75 72 20 | 4d 61 69 6c 20 64 69 72 |in your |Mail dir|
|00002540| 65 63 74 6f 72 79 2c 20 | 63 72 65 61 74 65 20 61 |ectory, |create a|
|00002550| 20 66 69 6c 65 20 6e 61 | 6d 65 64 20 22 63 6f 6d | file na|med "com|
|00002560| 70 6f 6e 65 6e 74 73 2e | 74 22 0a 58 77 69 74 68 |ponents.|t".Xwith|
|00002570| 20 74 68 65 73 65 20 65 | 78 61 6d 70 6c 65 20 6c | these e|xample l|
|00002580| 69 6e 65 73 3a 0a 58 2e | 50 50 0a 58 2e 69 6e 20 |ines:.X.|PP.X.in |
|00002590| 2b 2e 35 69 0a 58 58 2d | 6e 6f 74 68 69 6e 67 3a |+.5i.XX-|nothing:|
|000025a0| 20 60 65 63 68 6f 20 22 | 22 60 0a 58 2e 62 72 0a | `echo "|"`.X.br.|
|000025b0| 58 54 6f 3a 20 0a 58 2e | 62 72 0a 58 43 63 3a 20 |XTo: .X.|br.XCc: |
|000025c0| 0a 58 2e 62 72 0a 58 46 | 63 63 3a 20 60 66 6f 6c |.X.br.XF|cc: `fol|
|000025d0| 64 65 72 20 2d 66 61 73 | 74 60 0a 58 2e 62 72 0a |der -fas|t`.X.br.|
|000025e0| 58 58 2d 6c 6f 63 61 6c | 2d 74 69 6d 65 3a 20 60 |XX-local|-time: `|
|000025f0| 64 61 74 65 60 0a 58 2e | 62 72 0a 58 53 75 62 6a |date`.X.|br.XSubj|
|00002600| 65 63 74 3a 0a 58 2e 62 | 72 0a 58 2d 2d 2d 2d 2d |ect:.X.b|r.X-----|
|00002610| 2d 2d 2d 2d 2d 2d 0a 58 | 2e 62 72 0a 58 20 0a 58 |------.X|.br.X .X|
|00002620| 2e 62 72 0a 58 54 68 69 | 73 20 73 68 6f 75 6c 64 |.br.XThi|s should|
|00002630| 20 6e 6f 74 20 62 65 20 | 65 78 70 61 6e 64 65 64 | not be |expanded|
|00002640| 20 75 6e 6c 65 73 73 20 | 2d 65 6e 74 69 72 65 20 | unless |-entire |
|00002650| 69 73 20 67 69 76 65 6e | 3a 20 60 64 61 74 65 60 |is given|: `date`|
|00002660| 0a 58 2e 62 72 0a 58 2e | 69 6e 20 2d 2e 35 69 0a |.X.br.X.|in -.5i.|
|00002670| 58 2e 50 50 0a 58 0a 58 | 54 68 65 20 66 69 72 73 |X.PP.X.X|The firs|
|00002680| 74 20 6c 69 6e 65 20 6f | 66 20 74 68 65 20 22 63 |t line o|f the "c|
|00002690| 6f 6d 70 6f 6e 65 6e 74 | 73 2e 74 22 20 66 69 6c |omponent|s.t" fil|
|000026a0| 65 2c 20 77 68 69 63 68 | 20 72 65 74 75 72 6e 73 |e, which| returns|
|000026b0| 20 61 6e 20 65 6d 70 74 | 79 0a 58 73 74 72 69 6e | an empt|y.Xstrin|
|000026c0| 67 2c 20 69 73 20 74 68 | 65 72 65 20 61 73 20 61 |g, is th|ere as a|
|000026d0| 6e 20 65 78 61 6d 70 6c | 65 20 6f 66 20 61 20 6c |n exampl|e of a l|
|000026e0| 69 6e 65 20 74 68 61 74 | 20 77 6f 75 6c 64 20 62 |ine that| would b|
|000026f0| 65 20 6f 6d 69 74 74 65 | 64 20 69 6e 20 74 68 65 |e omitte|d in the|
|00002700| 0a 58 70 72 6f 63 65 73 | 73 65 64 20 63 6f 6d 70 |.Xproces|sed comp|
|00002710| 6f 73 69 74 69 6f 6e 20 | 66 69 6c 65 2e 0a 58 0a |osition |file..X.|
|00002720| 58 57 68 65 6e 20 65 76 | 65 72 79 74 68 69 6e 67 |XWhen ev|erything|
|00002730| 20 69 73 20 72 65 61 64 | 79 2c 20 69 6e 76 6f 6b | is read|y, invok|
|00002740| 65 20 22 70 70 63 6f 6d | 70 22 20 74 6f 20 73 65 |e "ppcom|p" to se|
|00002750| 65 20 77 68 61 74 20 68 | 61 70 70 65 6e 73 2e 0a |e what h|appens..|
|00002760| 58 0a 58 2e 53 48 20 41 | 55 54 48 4f 52 0a 58 0a |X.X.SH A|UTHOR.X.|
|00002770| 58 4a 65 72 72 79 20 53 | 77 65 65 74 20 3c 6a 73 |XJerry S|weet <js|
|00002780| 77 65 65 74 40 69 72 76 | 69 6e 65 2e 63 6f 6d 3e |weet@irv|ine.com>|
|00002790| 2e 20 20 0a 58 0a 58 4d | 68 70 70 65 64 20 77 61 |.  .X.XM|hpped wa|
|000027a0| 73 20 74 61 6b 65 6e 20 | 66 72 6f 6d 20 22 62 69 |s taken |from "bi|
|000027b0| 70 70 22 2c 20 61 20 73 | 6c 69 67 68 74 6c 79 20 |pp", a s|lightly |
|000027c0| 73 69 6d 70 6c 65 72 20 | 73 68 65 6c 6c 2f 61 77 |simpler |shell/aw|
|000027d0| 6b 20 70 72 6f 67 72 61 | 6d 0a 58 62 79 20 4a 65 |k progra|m.Xby Je|
|000027e0| 72 72 79 20 50 65 65 6b | 20 3c 6a 70 65 65 6b 40 |rry Peek| <jpeek@|
|000027f0| 6f 72 61 2e 63 6f 6d 3e | 2e 0a 5f 5f 5f 5f 5f 5f |ora.com>|..______|
|00002800| 5f 5f 54 68 69 73 5f 49 | 73 5f 54 68 65 5f 45 4e |__This_I|s_The_EN|
|00002810| 44 5f 5f 5f 5f 5f 5f 5f | 5f 0a 69 66 20 74 65 73 |D_______|_.if tes|
|00002820| 74 20 60 77 63 20 2d 6c | 20 3c 20 6d 68 70 70 65 |t `wc -l| < mhppe|
|00002830| 64 2e 6c 60 20 2d 6e 65 | 20 31 35 34 3b 20 74 68 |d.l` -ne| 154; th|
|00002840| 65 6e 0a 09 65 63 68 6f | 20 27 73 68 61 72 3a 20 |en..echo| 'shar: |
|00002850| 6d 68 70 70 65 64 2e 6c | 20 77 61 73 20 64 61 6d |mhpped.l| was dam|
|00002860| 61 67 65 64 20 64 75 72 | 69 6e 67 20 74 72 61 6e |aged dur|ing tran|
|00002870| 73 69 74 20 28 73 68 6f | 75 6c 64 20 68 61 76 65 |sit (sho|uld have|
|00002880| 20 62 65 65 6e 20 31 35 | 34 20 62 79 74 65 73 29 | been 15|4 bytes)|
|00002890| 27 0a 66 69 0a 66 69 09 | 09 3b 20 3a 20 65 6e 64 |'.fi.fi.|.; : end|
|000028a0| 20 6f 66 20 6f 76 65 72 | 77 72 69 74 69 6e 67 20 | of over|writing |
|000028b0| 63 68 65 63 6b 0a 65 78 | 69 74 20 30 0a          |check.ex|it 0.   |
+--------+-------------------------+-------------------------+--------+--------+